package org.kgduyjj.toolkit.algorithm;

import java.util.Random;

import org.kgduyjj.toolkit.util.StringUtils;

/**
 * 邀请码生成器，基本原理：<br/>
 * 1）入参用户ID：1 <br/>
 * 2）使用自定义进制转换之后为：M <br/>
 * 3）转换未字符串，并在后面添加{@value #SUFFIX_CHAR}：M{@value #SUFFIX_CHAR} <br/>
 * 4）在M{@value #SUFFIX_CHAR}后面再随机补足位数，得到：M{@value #SUFFIX_CHAR}HKHE <br/>
 * 5）反向转换时以{@value #SUFFIX_CHAR}为分界线，{@value #SUFFIX_CHAR}后面的不再解析 <br/>
 */
public class ShareCodeWorker {

    private ShareCodeWorker() {
    }

    /** 自定义进制(0,1没有加入,容易与o,l混淆)，数组顺序可进行调整增加反推难度，A用来补位因此此数组不包含A，共31个字符。 */
    private static final char[] CONFUSED_CHARS = new char[] { '3', 'M', 'J', 'L', 'A', 'U', 'F', 'R', '4', 'W', 'Y',
            'V', 'E', '8', 'S', '2', 'D', 'Z', 'X', '9', 'C', '7', 'P', '5', 'I', 'K', 'T', 'N', '6', 'B', 'G', 'Q' };

    /** 分割字符 不能与自定义重复 */
    private static final char SUFFIX_CHAR = 'H';

    /** 进制长度 */
    private static final int BIN_LEN = CONFUSED_CHARS.length;

    /** 生成邀请码最小长度 */
    private static final int DEFAULT_MIN_LENGHT = 8;

    /**
     * 生成指定长度邀请码
     * 
     * @param serialNo
     * @param minLenght
     * @return
     */
    public static String compile(Long serialNo, int minLenght) {
        char[] buf = new char[BIN_LEN];
        int charPos = BIN_LEN;

        // 当id除以数组长度结果大于0，则进行取模操作，并以取模的值作为数组的坐标获得对应的字符
        while (serialNo / BIN_LEN > 0) {
            int index = (int) (serialNo % BIN_LEN);
            buf[--charPos] = CONFUSED_CHARS[index];
            serialNo /= BIN_LEN;
        }

        buf[--charPos] = CONFUSED_CHARS[(int) (serialNo % BIN_LEN)];
        // 将字符数组转化为字符串
        String result = new String(buf, charPos, BIN_LEN - charPos);

        // 长度不足指定长度则随机补全
        int len = result.length();
        if (len < minLenght) {
            StringBuilder sb = new StringBuilder();
            sb.append(SUFFIX_CHAR);
            Random random = new Random();
            // 去除SUFFIX_CHAR本身占位之后需要补齐的位数
            for (int i = 0; i < minLenght - len - 1; i++) {
                sb.append(CONFUSED_CHARS[random.nextInt(BIN_LEN)]);
            }
            result += sb.toString();
        }

        return result;

    }

    /**
     * 把<code>serilaNo</code>编译为一个代码
     *
     * @param serialNo
     * @return
     */
    public static String compile(Long serialNo) {
        return compile(serialNo, DEFAULT_MIN_LENGHT);
    }

    /**
     * 通过代码反编译出来<code>serialNo</code>
     *
     * @param encryptcode
     * @return
     */
    public static Long decompile(String encryptcode) {
        if (StringUtils.isBlank(encryptcode)) {
            return null;
        }
        char[] charArray = encryptcode.toCharArray();
        long serialNo = 0L;
        for (int i = 0; i < charArray.length; i++) {
            int index = 0;
            for (int j = 0; j < BIN_LEN; j++) {
                if (charArray[i] == CONFUSED_CHARS[j]) {
                    index = j;
                    break;
                }
            }
            if (charArray[i] == SUFFIX_CHAR) {
                break;
            }
            serialNo = i > 0 ? serialNo * BIN_LEN + index : index;
        }

        return serialNo;

    }

}
